home *** CD-ROM | disk | FTP | other *** search
- global i, gno, jumplistkeyz
-
- on startMovie
- set mycursor to [1, 2]
- repeat with i = 11 to 15
- set the cursor of sprite i to mycursor
- end repeat
- set jumplistkeyz to ["M1", "M2", "M3", "M4", "M5", "M6", "M7", "M8"]
- set volset to the soundLevel
- if the soundEnabled = 0 then
- set the soundEnabled to 1
- end if
- end
-
- on doexit
- sound stop 1
- go("M3", "@::JMACMENU")
- end
-
- on crtopen
- puppetSprite(8, 1)
- repeat while the stillDown
- set the memberNum of sprite 8 to 10
- updateStage()
- end repeat
- set the memberNum of sprite 8 to 9
- updateStage()
- puppetSprite(8, 0)
- end
-
- on crtclose
- puppetSprite(9, 1)
- repeat while the stillDown
- set the memberNum of sprite 9 to 12
- updateStage()
- end repeat
- set the memberNum of sprite 9 to 11
- updateStage()
- puppetSprite(9, 0)
- end
-
- on crtopen0
- puppetSprite(10, 1)
- repeat while the stillDown
- set the memberNum of sprite 10 to 14
- updateStage()
- end repeat
- set the memberNum of sprite 10 to 13
- updateStage()
- puppetSprite(10, 0)
- end
-
- on crtclose2
- puppetSprite(22, 1)
- repeat while the stillDown
- set the memberNum of sprite 22 to 24
- updateStage()
- end repeat
- set the memberNum of sprite 22 to 23
- updateStage()
- puppetSprite(22, 0)
- end
-
- on crtnextm
- puppetSprite(20, 1)
- repeat while the stillDown
- set the memberNum of sprite 20 to 30
- updateStage()
- end repeat
- set the memberNum of sprite 20 to 29
- updateStage()
- puppetSprite(20, 0)
- end
-
- on crtbackm
- puppetSprite(21, 1)
- repeat while the stillDown
- set the memberNum of sprite 21 to 32
- updateStage()
- end repeat
- set the memberNum of sprite 21 to 31
- updateStage()
- puppetSprite(21, 0)
- end
-
- on crtexit
- puppetSprite(22, 1)
- repeat while the stillDown
- set the memberNum of sprite 22 to 34
- updateStage()
- end repeat
- set the memberNum of sprite 22 to 33
- updateStage()
- puppetSprite(22, 0)
- end
-